﻿Public Class ReceiptsBUS
    Private receiptsdao As New ReceiptsDAO()
    Public Function Receipts_Insert(ByVal ExportItemID As Integer, _
                                    ByVal Description As String, _
                                    ByVal Price As Double, _
                                    ByVal PricebyText As String, _
                                    ByVal RateOfExchange As Integer, _
                                    ByVal ReceiptDate As Date, _
                                    ByVal ReceiptBy As Integer, _
                                    ByVal CreatedBy As String) As Boolean
        Return receiptsdao.Receipts_Insert(ExportItemID, _
                                           Description, _
                                           Price, _
                                           PricebyText, _
                                           RateOfExchange, _
                                           ReceiptDate, _
                                           ReceiptBy, _
                                           CreatedBy)
    End Function

    Public Function Receipts_List() As DataSet
        Return receiptsdao.Receipts_List()
    End Function

    Public Function Receipts_Delete(ByVal ReceiptID As Integer) As Boolean
        Return receiptsdao.Receipts_Delete(ReceiptID)
    End Function




End Class
